U S E   [ m a s t e r ] 
 
 G O 
 
 / * * * * * *   O b j e c t :     D a t a b a s e   [ P I T ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 C R E A T E   D A T A B A S E   [ P I T ] 
 
   C O N T A I N M E N T   =   N O N E 
 
   O N     P R I M A R Y   
 
 (   N A M E   =   N ' P I T ' ,   F I L E N A M E   =   N ' < P A T H \ F I L E N A M E . E X T > '   ,   S I Z E   =   4 0 9 6 K B   ,   M A X S I Z E   =   U N L I M I T E D ,   F I L E G R O W T H   =   1 0 2 4 K B   ) 
 
   L O G   O N   
 
 (   N A M E   =   N ' P I T _ l o g ' ,   F I L E N A M E   =   N ' < P A T H \ F I L E N A M E . E X T > '   ,   S I Z E   =   4 0 9 6 K B   ,   M A X S I Z E   =   2 6 8 4 3 5 4 5 6 K B   ,   F I L E G R O W T H   =   1 0 % ) 
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   C O M P A T I B I L I T Y _ L E V E L   =   1 0 0 
 
 G O 
 
 I F   ( 1   =   F U L L T E X T S E R V I C E P R O P E R T Y ( ' I s F u l l T e x t I n s t a l l e d ' ) ) 
 
 b e g i n 
 
 E X E C   [ P I T ] . [ d b o ] . [ s p _ f u l l t e x t _ d a t a b a s e ]   @ a c t i o n   =   ' e n a b l e ' 
 
 e n d 
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A N S I _ N U L L _ D E F A U L T   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A N S I _ P A D D I N G   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A N S I _ W A R N I N G S   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A R I T H A B O R T   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A U T O _ C L O S E   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A U T O _ C R E A T E _ S T A T I S T I C S   O N   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A U T O _ S H R I N K   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A U T O _ U P D A T E _ S T A T I S T I C S   O N   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   C U R S O R _ C L O S E _ O N _ C O M M I T   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   C U R S O R _ D E F A U L T     G L O B A L   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   C O N C A T _ N U L L _ Y I E L D S _ N U L L   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   N U M E R I C _ R O U N D A B O R T   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   R E C U R S I V E _ T R I G G E R S   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T     D I S A B L E _ B R O K E R   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A U T O _ U P D A T E _ S T A T I S T I C S _ A S Y N C   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   D A T E _ C O R R E L A T I O N _ O P T I M I Z A T I O N   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   T R U S T W O R T H Y   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   A L L O W _ S N A P S H O T _ I S O L A T I O N   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   P A R A M E T E R I Z A T I O N   S I M P L E   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   R E A D _ C O M M I T T E D _ S N A P S H O T   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   H O N O R _ B R O K E R _ P R I O R I T Y   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   R E C O V E R Y   S I M P L E   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T     M U L T I _ U S E R   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   P A G E _ V E R I F Y   C H E C K S U M     
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   D B _ C H A I N I N G   O F F   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   F I L E S T R E A M (   N O N _ T R A N S A C T E D _ A C C E S S   =   O F F   )   
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T   T A R G E T _ R E C O V E R Y _ T I M E   =   0   S E C O N D S   
 
 G O 
 
 U S E   [ P I T ] 
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     T a b l e   [ d b o ] . [ D e v i c e ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O N 
 
 G O 
 
 C R E A T E   T A B L E   [ d b o ] . [ D e v i c e ] ( 
 
 	 [ D e v i c e U U I D ]   [ v a r c h a r ] ( 4 0 )   N O T   N U L L , 
 
 	 [ D e v i c e T y p e ]   [ i n t ]   N O T   N U L L , 
 
 	 [ D e v i c e M e m o ]   [ v a r c h a r ] ( 5 0 )   N U L L , 
 
   C O N S T R A I N T   [ P K _ D e v i c e ]   P R I M A R Y   K E Y   C L U S T E R E D   
 
 ( 
 
 	 [ D e v i c e U U I D ]   A S C 
 
 ) W I T H   ( P A D _ I N D E X   =   O F F ,   S T A T I S T I C S _ N O R E C O M P U T E   =   O F F ,   I G N O R E _ D U P _ K E Y   =   O F F ,   A L L O W _ R O W _ L O C K S   =   O N ,   A L L O W _ P A G E _ L O C K S   =   O N )   O N   [ P R I M A R Y ] 
 
 )   O N   [ P R I M A R Y ] 
 
 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O F F 
 
 G O 
 
 / * * * * * *   O b j e c t :     T a b l e   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O N 
 
 G O 
 
 C R E A T E   T A B L E   [ d b o ] . [ D e v i c e A s s i g n m e n t s ] ( 
 
 	 [ A s s i g n m e n t R e c o r d I D ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ D e v i c e U U I D ]   [ v a r c h a r ] ( 4 0 )   N O T   N U L L , 
 
 	 [ A s s i g n e e I D ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ C h e c k O u t D a t e ]   [ d a t e ]   N O T   N U L L , 
 
 	 [ C h e c k I n D a t e ]   [ d a t e ]   N U L L , 
 
 	 [ D a t a C o l l e c t i o n D a t e ]   [ d a t e ]   N U L L , 
 
   C O N S T R A I N T   [ P K _ D e v i c e A s s i g n m e n t s ]   P R I M A R Y   K E Y   C L U S T E R E D   
 
 ( 
 
 	 [ A s s i g n m e n t R e c o r d I D ]   A S C 
 
 ) W I T H   ( P A D _ I N D E X   =   O F F ,   S T A T I S T I C S _ N O R E C O M P U T E   =   O F F ,   I G N O R E _ D U P _ K E Y   =   O F F ,   A L L O W _ R O W _ L O C K S   =   O N ,   A L L O W _ P A G E _ L O C K S   =   O N )   O N   [ P R I M A R Y ] 
 
 )   O N   [ P R I M A R Y ] 
 
 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O F F 
 
 G O 
 
 / * * * * * *   O b j e c t :     T a b l e   [ d b o ] . [ T r a n s f e r B a t c h L o g ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 C R E A T E   T A B L E   [ d b o ] . [ T r a n s f e r B a t c h L o g ] ( 
 
 	 [ T r a n s f e r B a t c h ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ T r a n s m i t D a t e ]   [ d a t e t i m e ]   N O T   N U L L , 
 
 	 [ D e v i c e A s s i g n m e n t I D ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ R e c o r d s ]   [ i n t ]   N O T   N U L L , 
 
   C O N S T R A I N T   [ P K _ T r a n s f e r B a t c h L o g ]   P R I M A R Y   K E Y   C L U S T E R E D   
 
 ( 
 
 	 [ T r a n s f e r B a t c h ]   A S C 
 
 ) W I T H   ( P A D _ I N D E X   =   O F F ,   S T A T I S T I C S _ N O R E C O M P U T E   =   O F F ,   I G N O R E _ D U P _ K E Y   =   O F F ,   A L L O W _ R O W _ L O C K S   =   O N ,   A L L O W _ P A G E _ L O C K S   =   O N )   O N   [ P R I M A R Y ] 
 
 )   O N   [ P R I M A R Y ] 
 
 
 
 G O 
 
 / * * * * * *   O b j e c t :     T a b l e   [ d b o ] . [ U s e r ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O N 
 
 G O 
 
 C R E A T E   T A B L E   [ d b o ] . [ U s e r ] ( 
 
 	 [ U s e r I D ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ L a s t N a m e ]   [ v a r c h a r ] ( 5 0 )   N O T   N U L L , 
 
 	 [ F i r s t N a m e ]   [ v a r c h a r ] ( 5 0 )   N O T   N U L L , 
 
 	 [ D e v i c e P i n ]   [ s m a l l i n t ]   N O T   N U L L , 
 
 	 [ O r g a n i z a t i o n ]   [ v a r c h a r ] ( 1 5 0 )   N O T   N U L L , 
 
   C O N S T R A I N T   [ P K _ U s e r ]   P R I M A R Y   K E Y   C L U S T E R E D   
 
 ( 
 
 	 [ U s e r I D ]   A S C 
 
 ) W I T H   ( P A D _ I N D E X   =   O F F ,   S T A T I S T I C S _ N O R E C O M P U T E   =   O F F ,   I G N O R E _ D U P _ K E Y   =   O F F ,   A L L O W _ R O W _ L O C K S   =   O N ,   A L L O W _ P A G E _ L O C K S   =   O N )   O N   [ P R I M A R Y ] 
 
 )   O N   [ P R I M A R Y ] 
 
 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O F F 
 
 G O 
 
 / * * * * * *   O b j e c t :     T a b l e   [ d b o ] . [ V e t e r a n S u r v e y ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O N 
 
 G O 
 
 C R E A T E   T A B L E   [ d b o ] . [ V e t e r a n S u r v e y ] ( 
 
 	 [ S u r v e y I D ]   [ u n i q u e i d e n t i f i e r ]   N O T   N U L L , 
 
 	 [ S u r v e y D a t e T i m e ]   [ d a t e t i m e ]   N O T   N U L L , 
 
 	 [ F i r s t N a m e ]   [ v a r c h a r ] ( 2 5 5 )   N U L L , 
 
 	 [ M i d d l e N a m e ]   [ v a r c h a r ] ( 2 5 5 )   N U L L , 
 
 	 [ L a s t N a m e ]   [ v a r c h a r ] ( 2 5 5 )   N U L L , 
 
 	 [ G e n d e r ]   [ c h a r ] ( 1 )   N O T   N U L L , 
 
 	 [ A g e ]   [ i n t ]   N U L L , 
 
 	 [ P i c t u r e ]   [ i m a g e ]   N U L L , 
 
 	 [ C h r o n i c a l l y H o m e l e s s ]   [ b i t ]   N U L L , 
 
 	 [ L o c a t i o n L a t i t u d e ]   [ f l o a t ]   N U L L , 
 
 	 [ L o c a t i o n L o n g i t u d e ]   [ f l o a t ]   N U L L , 
 
 	 [ L o c a t i o n A c c u r a c y ]   [ f l o a t ]   N U L L , 
 
 	 [ A d d r e s s ]   [ v a r c h a r ] ( 2 5 5 )   N U L L , 
 
 	 [ C i t y ]   [ v a r c h a r ] ( 2 5 5 )   N U L L , 
 
 	 [ S t a t e ]   [ c h a r ] ( 2 )   N U L L , 
 
 	 [ _ r e c o r d C r e a t e d ]   [ d a t e t i m e ]   N O T   N U L L , 
 
 	 [ _ d e v i c e I D ]   [ v a r c h a r ] ( 4 0 )   N U L L , 
 
   C O N S T R A I N T   [ P K _ V e t e r a n S u r v e y ]   P R I M A R Y   K E Y   C L U S T E R E D   
 
 ( 
 
 	 [ S u r v e y I D ]   A S C 
 
 ) W I T H   ( P A D _ I N D E X   =   O F F ,   S T A T I S T I C S _ N O R E C O M P U T E   =   O F F ,   I G N O R E _ D U P _ K E Y   =   O F F ,   A L L O W _ R O W _ L O C K S   =   O N ,   A L L O W _ P A G E _ L O C K S   =   O N )   O N   [ P R I M A R Y ] 
 
 )   O N   [ P R I M A R Y ]   T E X T I M A G E _ O N   [ P R I M A R Y ] 
 
 
 
 G O 
 
 S E T   A N S I _ P A D D I N G   O F F 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]     W I T H   N O C H E C K   A D D     C O N S T R A I N T   [ F K _ D e v i c e A s s i g n m e n t s _ D e v i c e ]   F O R E I G N   K E Y ( [ D e v i c e U U I D ] ) 
 
 R E F E R E N C E S   [ d b o ] . [ D e v i c e ]   ( [ D e v i c e U U I D ] ) 
 
 N O T   F O R   R E P L I C A T I O N   
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]   N O C H E C K   C O N S T R A I N T   [ F K _ D e v i c e A s s i g n m e n t s _ D e v i c e ] 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]     W I T H   N O C H E C K   A D D     C O N S T R A I N T   [ F K _ D e v i c e A s s i g n m e n t s _ U s e r ]   F O R E I G N   K E Y ( [ A s s i g n e e I D ] ) 
 
 R E F E R E N C E S   [ d b o ] . [ U s e r ]   ( [ U s e r I D ] ) 
 
 N O T   F O R   R E P L I C A T I O N   
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]   N O C H E C K   C O N S T R A I N T   [ F K _ D e v i c e A s s i g n m e n t s _ U s e r ] 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ T r a n s f e r B a t c h L o g ]     W I T H   N O C H E C K   A D D     C O N S T R A I N T   [ F K _ T r a n s f e r B a t c h L o g _ D e v i c e A s s i g n m e n t s ]   F O R E I G N   K E Y ( [ D e v i c e A s s i g n m e n t I D ] ) 
 
 R E F E R E N C E S   [ d b o ] . [ D e v i c e A s s i g n m e n t s ]   ( [ A s s i g n m e n t R e c o r d I D ] ) 
 
 N O T   F O R   R E P L I C A T I O N   
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ T r a n s f e r B a t c h L o g ]   N O C H E C K   C O N S T R A I N T   [ F K _ T r a n s f e r B a t c h L o g _ D e v i c e A s s i g n m e n t s ] 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ V e t e r a n S u r v e y ]     W I T H   C H E C K   A D D     C O N S T R A I N T   [ C K _ V e t e r a n S u r v e y _ A g e ]   C H E C K     ( ( [ A g e ] > = ( 1 7 )   A N D   [ A g e ] < = ( 1 2 0 ) ) ) 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ V e t e r a n S u r v e y ]   C H E C K   C O N S T R A I N T   [ C K _ V e t e r a n S u r v e y _ A g e ] 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ V e t e r a n S u r v e y ]     W I T H   C H E C K   A D D     C O N S T R A I N T   [ C K _ V e t e r a n S u r v e y _ G e n d e r ]   C H E C K     ( ( [ G e n d e r ] = ' M '   O R   [ G e n d e r ] = ' F ' ) ) 
 
 G O 
 
 A L T E R   T A B L E   [ d b o ] . [ V e t e r a n S u r v e y ]   C H E C K   C O N S T R A I N T   [ C K _ V e t e r a n S u r v e y _ G e n d e r ] 
 
 G O 
 
 E X E C   s y s . s p _ a d d e x t e n d e d p r o p e r t y   @ n a m e = N ' M S _ D e s c r i p t i o n ' ,   @ v a l u e = N ' C h e c k   A g e   V a l u e '   ,   @ l e v e l 0 t y p e = N ' S C H E M A ' , @ l e v e l 0 n a m e = N ' d b o ' ,   @ l e v e l 1 t y p e = N ' T A B L E ' , @ l e v e l 1 n a m e = N ' V e t e r a n S u r v e y ' ,   @ l e v e l 2 t y p e = N ' C O N S T R A I N T ' , @ l e v e l 2 n a m e = N ' C K _ V e t e r a n S u r v e y _ A g e ' 
 
 G O 
 
 E X E C   s y s . s p _ a d d e x t e n d e d p r o p e r t y   @ n a m e = N ' M S _ D e s c r i p t i o n ' ,   @ v a l u e = N ' C h e c k s   G e n d e r   V a l u e   f o r   M / F '   ,   @ l e v e l 0 t y p e = N ' S C H E M A ' , @ l e v e l 0 n a m e = N ' d b o ' ,   @ l e v e l 1 t y p e = N ' T A B L E ' , @ l e v e l 1 n a m e = N ' V e t e r a n S u r v e y ' ,   @ l e v e l 2 t y p e = N ' C O N S T R A I N T ' , @ l e v e l 2 n a m e = N ' C K _ V e t e r a n S u r v e y _ G e n d e r ' 
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     S t o r e d P r o c e d u r e   [ d b o ] . [ a p _ c r e a t e S u r v e y R e c o r d ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O F F 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F 
 
 G O 
 
 
 
 
 
 C R E A T E   P R O C E D U R E   [ d b o ] . [ a p _ c r e a t e S u r v e y R e c o r d ] 
 
 
 
 @ S u r v e y D a t e T i m e   d a t e t i m e , 	 	 - -   d a t e   a n d   t i m e   o f   s u r v e y 
 
 @ F i r s t N a m e   v a r c h a r ( 2 5 5 ) , 	 	 - -   v e t e r a n   f i r s t   n a m e 	 
 
 @ M i d d l e N a m e   v a r c h a r ( 2 5 5 ) , 	 	 - -   v e t e r a n   m i d d l e   n a m e 
 
 @ L a s t N a m e   v a r c h a r ( 2 5 5 ) , 	 	 	 - -   v e t e r a n   l a s t   n a m e 
 
 @ G e n d e r   c h a r ( 1 ) , 	 	 	 	 - -   v e t e r a n   g e n d e r 
 
 @ A g e   i n t , 	 	 	 	 	 	 - -   v e t e r a n   a g e 
 
 @ P i c t u r e   i m a g e , 	 	 	 	 	 - -   i m a g e   o f   v e t e r a n 
 
 @ D e v i c e I D   v a r c h a r ( 4 0 ) ,   	 	 	 - -   s u b m i t t e r   d e v i c e U U I D 
 
 @ C h r o n i c a l l y H o m e l e s s   b i t , 	 	 - -   s u r v e y   q u e s t i o n   1 = y e s   0 = n o 
 
 @ L o c _ L a t i t u d e   f l o a t ,   	 	 	 - -   l a t   c o o r d i n a t e   l o c a t i o n   o f   s u r v e y 
 
 @ L o c _ L o n g i t u d e   f l o a t ,   	 	 	 - -   l o n   c o o r d i n a t e   l o c a t i o n   o f   s u r v e y 
 
 @ L o c _ A c c u r a c y   f l o a t , 	 	 	 - -   c o o r d i n a t e s   a c c u r a c y 
 
 @ A d d r e s s   v a r c h a r ( 2 5 5 ) , 	 	 	 - -   a l t   a d d r e s s   o f   v e t e r a n 
 
 @ C i t y   v a r c h a r ( 2 5 5 ) ,   	 	 	 - -   c i t y   o f   c o l l e c t i o n 
 
 @ S t a t e   c h a r ( 2 ) , 	 	 	 	 	 - -   s t a t e   o f   c o l l e c t i o n 
 
 @ R e t u r n C o d e   b i t   O U T P U T 	 	 	 - -   r e t u r n   b i t   /   b o o l   v a l u e   { 1 = f a i l   0 = s u c c e s s } 
 
 
 
 / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   C r e a t e d   B y :     	 V A   D E V E L O P E R 
 
   D a t e :     	 	 0 1 / 0 8 / 2 0 1 2 
 
   L a s t   R e v i s i o n : 
 
   D a t e : 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   D e s c r i p t i o n :   	 D e s i g n e d   f o r   t h e   P I T   M o b i l e   A p p l i c a t i o n   P i l o t   I n i t i a t i v e .     
 
                                 I n t e r f a c e   p r o c e d u r e   f o r   h o m e l e s s   v e t e r a n   s u r v e y   r e c o r d   i n s e r t i o n . 
 
 	 	 	 	 C a l l s   a p p r o p r i a t e   i n t e r n a l   p r o c e d u r e   ( i p _ ) . 
 
 
 
   P a r a m   n o t e s :       A l l   d a t a   e x p l i c i t l y   r e q u i r e d   -   n o   d e f a u l t s .     F a i l u r e   t o   p r o v i d e   p a r a m e t e r i z e d   d a t a   r e s u l t s   i n   N U L L   
 
                                 i n s e r t i o n   v a l u e .   C o n s t r a i n t   o n   G e n d e r ,   A g e ,   a n d   S u r v e y D a t e T i m e   f i e l d   w i l l   r e s u l t   i n   t r a n s a c t i o n   f a i l u r e   
 
 	 	 	 	 r e t u r n   c o d e   i f   v i o l a t e d . 
 
   
 
   P r e c o n d i t i o n :     N o n e . 
 
   
 
   P o s t c o n d i t i o n :   P a r a m e t e r i z e d   d a t a   i s   u s e d   t o   c r e a t e   r e c o r d   a n d   r e t u r n   b i t   ( b o o l e a n )   v a l u e   o f   1   f o r   f a i l   o f 
 
                                 r e c o r d   i n s e r t i o n   o t h e r w i s e   0   f o r   s u c c e s s   
 
   
 
 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / 
 
 A S 
 
 
 
 - -   R e d u c e   m e s s a g e   t r a f f i c   o p t i o n 
 
 S E T   N O C O U N T   O N 
 
 
 
 E X E C   i p _ c r e a t e S u r v e y R e c o r d   @ S u r v e y D a t e T i m e ,   @ F i r s t N a m e ,   @ M i d d l e N a m e ,   @ L a s t N a m e ,   @ G e n d e r ,   @ A g e ,   @ P i c t u r e ,   @ D e v i c e I D ,   @ C h r o n i c a l l y H o m e l e s s , 
 
 @ L o c _ L a t i t u d e ,   @ L o c _ L o n g i t u d e ,   @ L o c _ A c c u r a c y ,   @ A d d r e s s ,   @ C i t y ,   @ S t a t e ,   @ R e t u r n C o d e   O U T P U T 
 
 
 
 
 
 G O 
 
 / * * * * * *   O b j e c t :     S t o r e d P r o c e d u r e   [ d b o ] . [ i p _ c r e a t e S u r v e y R e c o r d ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O F F 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F 
 
 G O 
 
 
 
 
 
 C R E A T E   P R O C E D U R E   [ d b o ] . [ i p _ c r e a t e S u r v e y R e c o r d ] 
 
 
 
 - -   p a r a m s 
 
 @ S u r v e y D a t e T i m e   d a t e t i m e , 	 	 - -   d a t e   a n d   t i m e   o f   s u r v e y 
 
 @ F i r s t N a m e   v a r c h a r ( 2 5 5 ) , 	 	 - -   v e t e r a n   f i r s t   n a m e 	 
 
 @ M i d d l e N a m e   v a r c h a r ( 2 5 5 ) , 	 	 - -   v e t e r a n   m i d d l e   n a m e 
 
 @ L a s t N a m e   v a r c h a r ( 2 5 5 ) , 	 	 	 - -   v e t e r a n   l a s t   n a m e 
 
 @ G e n d e r   c h a r ( 1 ) , 	 	 	 	 - -   v e t e r a n   g e n d e r 
 
 @ A g e   i n t , 	 	 	 	 	 	 - -   v e t e r a n   a g e 
 
 @ P i c t u r e   i m a g e , 	 	 	 	 	 - -   i m a g e   o f   v e t e r a n 
 
 @ D e v i c e I D   v a r c h a r ( 4 0 ) , 	 	 	 - -   s u b m i t t e r   d e v i c e U U I D 
 
 @ C h r o n i c a l l y H o m e l e s s   b i t , 	 	 - -   s u r v e y   q u e s t i o n   1 = y e s   0 = n o 
 
 @ L o c _ L a t i t u d e   f l o a t , 	 	 	 - -   l a t   c o o r d i n a t e   l o c a t i o n   o f   s u r v e y 
 
 @ L o c _ L o n g i t u d e   f l o a t , 	 	 	 - -   l o n   c o o r d i n a t e   l o c a t i o n   o f   s u r v e y 
 
 @ L o c _ A c c u r a c y     f l o a t , 	 	 	 - -   c o o r d i n a t e s   a c c u r a c y 
 
 @ A d d r e s s   v a r c h a r ( 2 5 5 ) , 	 	 	 - -   a l t   a d d r e s s   o f   v e t e r a n 
 
 @ C i t y   v a r c h a r ( 2 5 5 ) , 	 	 	 	 - -   c i t y   o f   c o l l e c t i o n 
 
 @ S t a t e   c h a r ( 2 ) , 	 	 	 	 	 - -   s t a t e   o f   c o l l e c t i o n 
 
 @ R e t u r n C o d e   b i t   O U T P U T 	 	 	 - -   r e t u r n   b i t   /   b o o l   v a l u e   { 1 = f a i l   0 = s u c c e s s } 
 
 
 
 / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   C r e a t e d   B y :     	 V A   D E V E L O P E R 
 
   D a t e :     	 	 0 1 / 0 8 / 2 0 1 2 
 
   L a s t   R e v i s i o n : 
 
   D a t e : 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   D e s c r i p t i o n :   	 D e s i g n e d   f o r   t h e   P I T   M o b i l e   A p p l i c a t i o n   P i l o t   I n i t i a t i v e .     
 
                                 I n t e r f a c e   p r o c e d u r e   f o r   h o m e l e s s   v e t e r a n   s u r v e y   r e c o r d   i n s e r t i o n . 
 
 
 
   P a r a m   n o t e s :       A l l   d a t a   e x p l i c i t l y   r e q u i r e d   -   n o   d e f a u l t s .     F a i l u r e   t o   p r o v i d e   p a r a m e t e r i z e d   d a t a   r e s u l t s   i n   N U L L   
 
                                 i n s e r t i o n   v a l u e .           
 
   
 
   P r e c o n d i t i o n :     N o n e . 
 
   
 
   P o s t c o n d i t i o n :   P a r a m e t e r i z e d   d a t a   i s   u s e d   t o   c r e a t e   r e c o r d   a n d   r e t u r n   b i t   ( b o o l e a n )   v a l u e   o f   1   f o r   f a i l   o f 
 
                                 r e c o r d   i n s e r t i o n   o t h e r w i s e   0   f o r   s u c c e s s   ( d e f a u l t   M S S Q L   f u n c t i o n a l i t y ) 
 
   
 
 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / 
 
 A S 
 
 
 
 - -   D e c l a r a t i o n s 
 
 D E C L A R E   @ R o l l B a c k   b i t                               - -   t o   i n d e n t i f y   t r a n s a c t i o n   s t a t e 
 
 D E C L A R E   @ R e c o r d I D   u n i q u e i d e n t i f i e r     - -   t o   c r e a t e   r e c o r d I D   G U I D 
 
 D E C L A R E   @ T x D T G   d a t e t i m e 	 	 	 	 - -   t o   e s t a b l i s h   D T G   o f   t r a n s a c t i o n 
 
 
 
 
 
 - -   I n i t i a l i z a t i o n s 
 
 S E T   @ T x D T G   =   g e t d a t e ( ) 	 	 	 	 - -   s e t t i n g   t o   D T G   o f   t r a n s a c t i o n   ( * * T A S K   N O T E * * c h e c k   o n   U T C / f o r m a t ) 
 
 S E T   @ R e c o r d I D   =   n e w I D ( ) 	 	 	 	 - -   c r e a t e   n e w   G U I D 
 
 S E T   @ R o l l b a c k   =   1 	 	 	 	 	 - -   a s s u m e s   r o l l b a c k 
 
 S E T   @ R e t u r n C o d e   =   1 	 	 	 	 	 - -   a s s u m e s   t r a n s a c t i o n n   f a i l u r e 
 
 
 
 B E G I N   T R A N S A C T I O N 
 
 
 
 
 
 / * * * * * p l a c e h o l d e r   f o r   D e v i c e   A s s i g n m e n t   &   B a t c h   T r a n s a c t i o n   L o g i c * * * * * * * 
 
 
 
 
 
 * * T A S K   N O T E S * *   1 . q u e r y   D e v i c e A s s i g n m e n t   g i v e n   D e v i c e I D 
 
                               2 . i n s e r t   T r a n s f e r B a t c h L o g   r e c o r d 
 
 	 	 	       3 . d e c l a r e / i n i t i a l i z e   v a r   w i t h   B a t c h I D   G U I D 
 
 	 	 	       4 . t e s t   t r a n s a c t i o n   q u e u e   /   s e t   r o l l b a c k 
 
 	 	 	       5 . i n c l u d e   i n   S u r v e y   i n s e r t   s t a t e m e n t 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * /   
 
 
 
 - -   q u e u i n g   s u r v e y   r e c o r d   i n s e r t   s t a t e m e n t   f r o m   p a r a m s   
 
 
 
 I N S E R T   I N T O   V e t e r a n S u r v e y 
 
 ( S u r v e y I D ,   S u r v e y D a t e T i m e ,     F i r s t N a m e ,   M i d d l e N a m e ,   L a s t N a m e ,   G e n d e r ,   A g e ,   P i c t u r e ,   C h r o n i c a l l y H o m e l e s s ,   L o c a t i o n L a t i t u d e ,   
 
 L o c a t i o n L o n g i t u d e ,   L o c a t i o n A c c u r a c y ,   A d d r e s s ,   C i t y ,   S t a t e ,   _ r e c o r d C r e a t e d ,   _ d e v i c e I D ) 
 
 V A L U E S 
 
 ( @ R e c o r d I D ,   @ S u r v e y D a t e T i m e ,   @ F i r s t N a m e ,   @ M i d d l e N a m e ,   @ L a s t N a m e ,   @ G e n d e r ,   @ A g e ,   @ P i c t u r e ,   @ C h r o n i c a l l y H o m e l e s s ,   @ L o c _ L a t i t u d e ,   
 
 @ L o c _ L o n g i t u d e ,   @ L o c _ A c c u r a c y ,   @ A d d r e s s ,   @ C i t y ,   @ S t a t e ,   @ T x D T G ,   @ D e v i c e I D )   
 
 
 
 - -   t e s t   t r a n s a c t i o n 
 
 I F   @ @ E R R O R   =   0   
 
 
 
 	 B E G I N   
 
 	 
 
 	 	 S E T   @ R o l l b a c k   =   0 
 
 
 
 	 
 
 	 E N D 
 
 
 
 
 
 
 
 - -   r o l l b a c k   o r   c o m m i t 
 
 I F   @ R o l l b a c k   =   1 
 
 	 B E G I N 
 
 	 R O L L B A C K   T R A N S A C T I O N 
 
 	 S E T   @ R e t u r n C o d e   =   1 
 
 	 E N D 
 
 E L S E 
 
 	 B E G I N 	 
 
 	 C O M M I T   T R A N S A C T I O N 
 
 	 S E T   @ R e t u r n C o d e   =   0 
 
 	 E N D 
 
 
 
 
 
 G O 
 
 / * * * * * *   O b j e c t :     U s e r D e f i n e d F u n c t i o n   [ d b o ] . [ s f n _ g e t A s s i g n m e n t R e c I D ]         S c r i p t   D a t e :   1 / 9 / 2 0 1 3   9 : 0 2 : 3 7   P M   * * * * * * / 
 
 S E T   A N S I _ N U L L S   O N 
 
 G O 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N 
 
 G O 
 
 C R E A T E   F U N C T I O N   [ d b o ] . [ s f n _ g e t A s s i g n m e n t R e c I D ]   ( @ D e v i c e I D   v a r c h a r ( 4 0 ) ) 
 
 / * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   C r e a t e d   B y :     	 V A   D E V E L O P E R 
 
   D a t e :     	 	 0 1 / 0 8 / 2 0 1 2 
 
   L a s t   R e v i s i o n : 
 
   D a t e : 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
   D e s c r i p t i o n :   	 D e s i g n e d   f o r   t h e   P I T   M o b i l e   A p p l i c a t i o n   P i l o t   I n i t i a t i v e .     
 
                                 S c a l a r   F u n c t i o n   t o   p e r f o r m   l o o k u p   o f   d e v i c e   a s s i g n m e n t   a n d   r e t u r n   a s s i g n m e n t   r e c o r d   i d e n t i f i e r . 
 
 
 
   P a r a m   n o t e s :       D e v i c e   U U I D         
 
   
 
   P r e c o n d i t i o n :     N o n e . 
 
   
 
   P o s t c o n d i t i o n :   A s s i g n m e n t R e c c o r d I D   l o o k u p   i s   p e r f o r m e d   a n d   r e t u r n e d 
 
   
 
 
 
 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / 
 
 
 
 R E T U R N S   U n i q u e I d e n t i f i e r   A S 
 
 B E G I N 
 
 - -     V a r i a b l e   D e c l a r a t i o n s 
 
 	 D E C L A R E   @ R e t u r n V a l   U n i q u e I d e n t i f i e r - -   S t a t u s   D e s c r i p t i o n   t o   b e   r e t u r n e d 
 
 
 
 	 - - D E C L A R E   @ R o w c o u n t   I N T 
 
 
 
 	 S E L E C T   @ R e t u r n V a l   =   A s s i g n m e n t R e c o r d I D   F R O M   D e v i c e A s s i g n m e n t s   w h e r e   D e v i c e U U I D   =   @ D e v i c e I D   a n d   C h e c k I n D a t e   ! =   N U L L     
 
 
 
 	 / * * * * * * * * * * * * * * * * * *   N O T E   T A S K L I S T   -   i m p l e m e n t   d e p r e c a t e d   x p _ s e n d m a i l   p r o c   r e p l a c e m e n t * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
 
 	 I F   @ @ R O W C O U N T   >   1 
 
 	 B E G I N 
 
 	 	 D E C L A R E   @ m s g   v a r c h a r ( 5 0 0 0 )   
 
 	 	 D E C L A R E   @ R e p   v a r c h a r ( 1 5 0 0 ) 
 
 	 	 D E C L A R E   @ S u b j   v a r c h a r ( 2 5 0 )   
 
 
 
 	 	 S E T   @ S u b j   =   ' D u p l i c a t e   D e v i c e I D   '   +   @ D e v i c e I D   +   '   p r e s e n t e d   t o   [ d b o ] . [ s f n _ g e t A s s i g n m e n t R e c I D ] '   
 
 	 	 S E T   @ R e p   =   '   '   - -   s e t   m a i l g r o u p 
 
 	 	 S E T   @ m s g   =   '   '   - -   d e t e r m i n e   m e s s a g e   c o n t e n t s   a n d   b u i l d 
 
 
 
 	 	 E X E C   m a s t e r . d b o . x p _ s e n d m a i l   @ r e c i p i e n t s   =     @ R e p ,   @ m e s s a g e   =   @ m s g ,   @ s u b j e c t   =   @ S u b j 
 
 
 
 	 E N D 
 
 	 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * / 
 
 	 
 
 	 R E T U R N   @ R e t u r n V a l 
 
 
 
 E N D 
 
 
 
 G O 
 
 
 
 
 
 U S E   [ m a s t e r ] 
 
 G O 
 
 A L T E R   D A T A B A S E   [ P I T ]   S E T     R E A D _ W R I T E   
 
 G O 
 
 